MacWorld 1999 April/Macworld (1999-04).dmg/Cool Specials/Al Morale Demo/Al's Stuff/D200.DCR/00092_Credits.ls

Text File | 1999-02-16 | 252 b | 17 lines

on mouseDown
  buttonClick3()
end

on mouseUp
  if the optionDown = 1 then
    ShowNum()
  else
    go("Credits")
  end if
end

on ShowNum
  set Num to the text of member "PrefData"
  alert("The serial number for this copy of Al Morale is" && Num)
end